for /f  "tokens=*" %%i in ('reg query hkey_classes_root\excel\defaulticon') do set officepath=%%i
cscript "%officepath:~18,-10%\ospp.vbs" /inpkey:VYBBJ-TRJPB-QFQRF-QFT4D-H3GVB
cscript "%officepath:~18,-10%\ospp.vbs" /sethst:59.83.33.68
cscript "%officepath:~18,-10%\ospp.vbs" /act
cscript "%officepath:~18,-10%\ospp.vbs" /dstatus
pause